home *** CD-ROM | disk | FTP | other *** search
/ BBS in a Box 5 / BBS in a Box -Volume V (BBS in a Box) (April 1992).iso / Files / Hyper / Hy-Hyperi / HyperFinder 4.0.cpt / HF Help 4.0 / card_13037.txt < prev    next >
Encoding:
Text File  |  1989-11-16  |  2.6 KB  |  116 lines
  1. -- card: 13037 from stack: in.0
  2. -- bmap block id: 3545
  3. -- flags: 4000
  4. -- background id: 11092
  5. -- name: SetUp
  6.  
  7.  
  8. -- part 1 (button)
  9. -- low flags: 00
  10. -- high flags: A004
  11. -- rect: left=426 top=261 right=324 bottom=487
  12. -- title width / last selected line: 0
  13. -- icon id / first selected line: 0 / 0
  14. -- text alignment: 1
  15. -- font id: 0
  16. -- text size: 12
  17. -- style flags: 0
  18. -- line height: 16
  19. -- part name: Print!
  20. ----- HyperTalk script -----
  21. on mouseUp
  22.   answer "Are you sure the printer is ready?" with "Maybe Not" or "OK"
  23.   if it is "Maybe Not" then go to Card "Lotto"
  24.   if it is "OK" then DoMenu Print Card
  25.   show Card button ID 3
  26.   show Card button ID 4
  27. end mouseUp
  28.  
  29.  
  30.  
  31. -- part 3 (button)
  32. -- low flags: 00
  33. -- high flags: A004
  34. -- rect: left=28 top=301 right=324 bottom=427
  35. -- title width / last selected line: 0
  36. -- icon id / first selected line: 0 / 0
  37. -- text alignment: 1
  38. -- font id: 0
  39. -- text size: 12
  40. -- style flags: 0
  41. -- line height: 16
  42. -- part name: ---- >  Click Here!  <----
  43. ----- HyperTalk script -----
  44. on mouseUp
  45.   Hide card Button Id 3
  46.   Hide card Button Id 4
  47.   ask "Please enter your Name :"
  48.   Put it into Field "rame" of Card "Setup"
  49.   ask "Please enter your Address :"
  50.   Put it into Field "address" of Card "Setup"
  51.   ask "Please enter your City :"
  52.   Put it into Field "city" of Card "Setup"
  53.   ask "Please enter your State :"
  54.   Put it into Field "state" of Card "Setup"
  55.   ask "Please enter your Zip :"
  56.   Put it into Field "zip" of Card "Setup"
  57.   wait for 3 seconds
  58.   show card Button Id 3
  59.   answer "You may print when ready!" with "OK"
  60. end mouseUp
  61.  
  62.  
  63.  
  64. -- part 4 (button)
  65. -- low flags: 80
  66. -- high flags: 2002
  67. -- rect: left=28 top=81 right=299 bottom=486
  68. -- title width / last selected line: 0
  69. -- icon id / first selected line: 0 / 0
  70. -- text alignment: 1
  71. -- font id: 0
  72. -- text size: 12
  73. -- style flags: 0
  74. -- line height: 16
  75. -- part name: 
  76.  
  77.  
  78. -- part 6 (button)
  79. -- low flags: 00
  80. -- high flags: 2000
  81. -- rect: left=28 top=276 right=296 bottom=79
  82. -- title width / last selected line: 0
  83. -- icon id / first selected line: 11045 / 11045
  84. -- text alignment: 1
  85. -- font id: 0
  86. -- text size: 12
  87. -- style flags: 0
  88. -- line height: 16
  89. -- part name: Home Card
  90. ----- HyperTalk script -----
  91. on mouseUp
  92.   visual effect barn door open slowly
  93.   go to "Home"
  94. end mouseUp
  95.  
  96.  
  97.  
  98.  
  99. -- part 7 (button)
  100. -- low flags: 00
  101. -- high flags: 2000
  102. -- rect: left=379 top=265 right=298 bottom=423
  103. -- title width / last selected line: 0
  104. -- icon id / first selected line: 7417 / 7417
  105. -- text alignment: 1
  106. -- font id: 0
  107. -- text size: 12
  108. -- style flags: 0
  109. -- line height: 16
  110. -- part name: New Button
  111. ----- HyperTalk script -----
  112. on mouseUp
  113.   go to card id 4434
  114. end mouseUp
  115.  
  116.